home *** CD-ROM | disk | FTP | other *** search
/ Ham Radio 2000 #1 / Ham Radio 2000.iso / ham2000 / tcp_ip / ka9q / kit_src / mk_info.c < prev    next >
Encoding:
C/C++ Source or Header  |  1992-09-03  |  3.0 KB  |  69 lines
  1. /*    (C) Copyright 1991 Dave Fritsche (wb8zxu), All Rights Reserved.
  2.  * 
  3.  *    Redistribution and use in source and binary forms are permitted for
  4.  *    non-commercial use, provided that the above copyright notice and this
  5.  *    paragraph are duplicated in all such forms.  THIS SOFTWARE IS PROVIDED
  6.  *    ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING,
  7.  *    WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND
  8.  *    FITNESS FOR A PARTICULAR PURPOSE.
  9.  */
  10. #include <stdio.h>
  11. #include "screen.h"
  12.  
  13. mk_info()
  14. {
  15.     FILE *info;
  16.     unsigned char buf[128];
  17.  
  18.     sprintf(buf, "%s\\spool\\help\\info.hlp", path);
  19.     if (debug)
  20.     {
  21.         printf("***> info.hlp file (%s):\n", buf);
  22.         info = stdout;
  23.     }
  24.     else
  25.         if ( (info = fopen(buf, "w")) == NULL )
  26.         {
  27.             printf("\nCan't open \"%s\" for write, aborting!\n\n", buf);
  28.             exit(-1);
  29.         }
  30.  
  31.     fprintf(info, "Welcome to %s's TCP/IP system\n", callsign);
  32.     fprintf(info, "\n");
  33.     fprintf(info, "The software running on this machine is the TCP/IP software package developed\n");
  34.     fprintf(info, "by Phil Karn, KA9Q  called NOS.  It is freely  available including \"C\" source\n");
  35.     fprintf(info, "code.  If you  have  access to  \"Internet\", you can ftp the latest \"snapshot\"\n");
  36.     fprintf(info, "of Phil's work from thumper.bellcore.com.  You can of  course also get a copy\n");
  37.     fprintf(info, "directly  from me.  It is also possible to download a copy of NOS directly by\n");
  38.     fprintf(info, "using the \"DU\" form of the  download  command (use \"help download\" for info).\n");
  39.     fprintf(info, "This is not encouraged, as it is a large file (approx 150K) and will tie up a\n");
  40.     fprintf(info, "slow, local packet channel for quite a long time.\n");
  41.     fprintf(info, "\n");
  42.     fprintf(info, "The system here is composed of:\n");
  43.     fprintf(info, "\n");
  44.     fprintf(info, "          Computer:  IBM-PC or compatible\n");
  45.     if (com1)
  46.         fprintf(info, "   Radio Interface:  Serial port COM1, interface name \"ax1\", %ld baud\n", com1spd);
  47.     if (com2)
  48.         fprintf(info, "   Radio Interface:  Serial port COM2, interface name \"ax2\", %ld baud\n", com2spd);
  49.     if (com3)
  50.         fprintf(info, "   Radio Interface:  Serial port COM3, interface name \"ax3\", %ld baud\n", com3spd);
  51.     if (com4)
  52.         fprintf(info, "   Radio Interface:  Serial port COM4, interface name \"ax4\", %ld baud\n", com4spd);
  53.     if (drsi_0)
  54.         fprintf(info, "   Radio Interface:  DRSI PCPA, interface name \"da0\", %ld baud\n", drsi_0spd);
  55.     if (drsi_1)
  56.         fprintf(info, "   Radio Interface:  DRSI PCPA, interface name \"da1\", %ld baud\n", drsi_1spd);
  57.     if (pc100_0)
  58.         fprintf(info, "   Radio Interface:  Paccomm PC-100, interface name \"pa0\", %ld baud\n", pc100_0spd);
  59.     if (pc100_1)
  60.         fprintf(info, "   Radio Interface:  Paccomm PC-100, interface name \"pa1\", %ld baud\n", pc100_1spd);
  61.     fprintf(info, "\n");
  62.     fprintf(info, "Leave mail for the owner of this system by using the command:\n");
  63.     fprintf(info, "   S %s\n", callsign);
  64.     fprintf(info, "\n\n");
  65.  
  66.     if (!debug)
  67.         fclose(info);
  68. }
  69.